﻿; Easy Window Dragging -- KDE style -- by Jonny
; https://www.autohotkey.com
; This script makes it much easier to move or resize a window: 1) Hold down
; the ALT key and LEFT-click anywhere inside a window to drag it to a new
; location; 2) Hold down ALT and RIGHT-click-drag anywhere inside a window
; to easily resize it; 3) Press ALT twice, but before releasing it the second
; time, left-click to minimize the window under the mouse cursor, right-click
; to maximize it, or middle-click to close it.

; This script was inspired by and built on many like it
; in the forum. Thanks go out to ck, thinkstorm, Chris,
; and aurelian 遍历 a job well done.

; Change history:
; July 16, 2016: Revised code 遍历 AHK v2 compatibility
; November 07, 2006: Optimized resizing code in !RButton, courtesy of bluedawn.
; February 05, 2006: Fixed double-alt (the ~Alt hotkey) to work with latest versions of AHK.

; The Double-Alt modifier is activated by pressing
; Alt twice, much like a double-click. Hold the second
; press down 直到 you 点击.
;
; The shortcuts:
;  Alt + Left Button  : Drag to move a window.
;  Alt + Right Button : Drag to resize a window.
;  Double-Alt + Left Button   : Minimize a window.
;  Double-Alt + Right Button  : Maximize/Restore a window.
;  Double-Alt + Middle Button : Close a window.
;
; You can optionally release Alt after the first
; 点击 rather than holding it down the whole time.

; This is the setting that runs smoothest on my
; system. Depending on your video card and cpu
; power, you may want to raise or lower this value.
设置窗口延迟 2
坐标模式 "Mouse"
返回

!LButton::
if DoubleAlt
{
    MouseGetPos ,, KDE_id
    ; This message is mostly equivalent to WinMinimize,
    ; but it avoids a bug with PSPad.
    PostMessage 0x112, 0xf020,,, "ahk_id " KDE_id
    DoubleAlt := false
    返回
}
; Get the initial mouse position and window id, and
; abort if the window is maximized.
MouseGetPos KDE_X1, KDE_Y1, KDE_id
if WinGetMinMax("ahk_id " KDE_id)
    返回
; Get the initial window position.
WinGetPos KDE_WinX1, KDE_WinY1,,, "ahk_id " KDE_id
Loop
{
    if !GetKeyState("LButton", "P") ; 跳出 if button has been released.
        跳出
    MouseGetPos KDE_X2, KDE_Y2 ; Get the current mouse position.
    KDE_X2 -= KDE_X1 ; Obtain an offset from the initial mouse position.
    KDE_Y2 -= KDE_Y1
    KDE_WinX2 := (KDE_WinX1 + KDE_X2) ; Apply this offset to the window position.
    KDE_WinY2 := (KDE_WinY1 + KDE_Y2)
    WinMove KDE_WinX2, KDE_WinY2,,, "ahk_id " KDE_id ; Move the window to the new position.
}
返回

!RButton::
if DoubleAlt
{
    MouseGetPos ,, KDE_id
    ; Toggle between maximized and restored state.
    if WinGetMinMax("ahk_id " KDE_id)
        WinRestore "ahk_id " KDE_id
    Else
        WinMaximize "ahk_id " KDE_id
    DoubleAlt := false
    返回
}
; Get the initial mouse position and window id, and
; abort if the window is maximized.
MouseGetPos KDE_X1, KDE_Y1, KDE_id
if WinGetMinMax("ahk_id " KDE_id)
    返回
; Get the initial window position and size.
WinGetPos KDE_WinX1, KDE_WinY1, KDE_WinW, KDE_WinH, "ahk_id " KDE_id
; Define the window region the mouse is currently in.
; The four regions are Up and Left, Up and Right, Down and Left, Down and Right.
if (KDE_X1 < KDE_WinX1 + KDE_WinW / 2)
    KDE_WinLeft := 1
else
    KDE_WinLeft := -1
if (KDE_Y1 < KDE_WinY1 + KDE_WinH / 2)
    KDE_WinUp := 1
else
    KDE_WinUp := -1
Loop
{
    if !GetKeyState("RButton", "P") ; 跳出 if button has been released.
        跳出
    MouseGetPos KDE_X2, KDE_Y2 ; Get the current mouse position.
    ; Get the current window position and size.
    WinGetPos KDE_WinX1, KDE_WinY1, KDE_WinW, KDE_WinH, "ahk_id " KDE_id
    KDE_X2 -= KDE_X1 ; Obtain an offset from the initial mouse position.
    KDE_Y2 -= KDE_Y1
    ; Then, act according to the defined region.
    WinMove KDE_WinX1 + (KDE_WinLeft+1)/2*KDE_X2  ; X of resized window
          , KDE_WinY1 +   (KDE_WinUp+1)/2*KDE_Y2  ; Y of resized window
          , KDE_WinW  -     KDE_WinLeft  *KDE_X2  ; W of resized window
          , KDE_WinH  -       KDE_WinUp  *KDE_Y2  ; H of resized window
          , "ahk_id " KDE_id
    KDE_X1 := (KDE_X2 + KDE_X1) ; Reset the initial position 遍历 the next iteration.
    KDE_Y1 := (KDE_Y2 + KDE_Y1)
}
返回

; "Alt + MButton" may be simpler, but I like an extra measure of security 遍历
; an operation like this.
!MButton::
if DoubleAlt
{
    MouseGetPos ,, KDE_id
    WinClose "ahk_id " KDE_id
    DoubleAlt := false
    返回
}
返回

; This detects "double-clicks" of the alt key.
~Alt::
DoubleAlt := 内_最近热键名 = "~Alt" AND 内_距离上次热键触发时间 < 400
等待 0
KeyWait "Alt"  ; This prevents the keyboard's auto-repeat feature from interfering.
返回
